@RT(Now class,Class..,Slaves) #DT
You'll see a few pictures of different panties #DT @SetVar[NumberOfRounds]=[#Random(8,12)]
I expect that you're able to identify the different types #DT @Goto(Route1)
(Route1)
@NullResponse @If[NumberOfRounds]<=[0]Then(End) @ChangeVar[NumberOfRounds]=[NumberOfRounds]-[1] @SetVar[LingerieClass3Count]=[0]
@NullResponse @Chance20(Choose) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.*] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1]
@NullResponse @Chance25(Choose) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.*] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1]
@NullResponse @Chance30(Choose) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.*] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @Goto(Choose)
(Choose)
@NullResponse @Goto(1,2,3,4,5,6,7)
(1)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\Boyshorts\*.jpg] @SetVar[LClass3ArtNr]=[1] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @Goto(Route1a)
(2)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\Brazilian\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[2] @Goto(Route1a)
(3)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\Crotchless\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[3] @Goto(Route1a)
(4)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\GString\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[4] @Goto(Route1a)
(5)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\HighCutBriefs\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[5] @Goto(Route1a)
(6)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\Hipster\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[6] @Goto(Route1a)
(7)
@NullResponse @ShowImage[\GNMImages\Academy\Lingerie\Panties\Thong\*.jpg] @ChangeVar[LingerieClass3Count]=[LingerieClass3Count]+[1] @SetVar[LClass3ArtNr]=[7] @Goto(Route1a)
(Route1a)
@NullResponse @Chance20(QuizAEnd) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.jpg]
@NullResponse @Chance25(QuizAEnd) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.jpg]
@NullResponse @Chance30(QuizAEnd) @ShowImage[\GNMImages\Academy\Lingerie\Panties\*.jpg] @Goto(QuizAEnd)
(QuizAEnd)
So what kind of panties was picture number #DT @ShowVar[LingerieClass3Count]? 
[boyshorts,boy,shorts]Boyshorts? #DT @If[LClass3ArtNr]==[1]Then(Correct) @Timeout(10,Wrong2) @Goto(Wrong)
[brazilian]Brazilian? #DT @If[LClass3ArtNr]==[2]Then(Correct) @Goto(Wrong)
[crotchless]Crotchless? #DT @If[LClass3ArtNr]==[3]Then(Correct) @Goto(Wrong)
[gstring,g,string,g-string]G-String? #DT @If[LClass3ArtNr]==[4]Then(Correct) @Goto(Wrong)
[high,cut,briefs,highcut]highcut briefs? #DT @If[LClass3ArtNr]==[5]Then(Correct) @Goto(Wrong)
[hipster]hipster? #DT @If[LClass3ArtNr]==[6]Then(Correct) @Goto(Wrong)
[thong]thong? #DT @If[LClass3ArtNr]==[7]Then(Correct) @Goto(Wrong)
@DifferentAnswer Thats not a name for panties.. Try again.. #DT
(Correct)
@RT(You are correct!,Correct!,You are right!,Thats correct,Oh wow you got it right,You was actually right..) #DT @ChangeVar[Right]=[Right]+[1]
@RT(Lucky for you,Good boy,I'm impressed,It makes me happy when you're right) #DT #GNMEmoteHappy @Goto(Another)
(Wrong)
@RT(Wrong..,Incorrect,You're wrong,Its wrong,Well ofcourse you're wrong,Its doesn't surprise me that you're wrong) #DT @ChangeVar[Wrong]=[Wrong]+[1] @Goto(Another)
(Wrong2)
@Variable[LClass3ArtNr]=[1] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) Boyshorts Miss
@Variable[LClass3ArtNr]=[2] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) Brazilian Miss
@Variable[LClass3ArtNr]=[3] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) Crotchless Miss
@Variable[LClass3ArtNr]=[4] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) G-String Miss
@Variable[LClass3ArtNr]=[5] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) High cut briefs Miss
@Variable[LClass3ArtNr]=[6] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) Hipster Miss
@Variable[LClass3ArtNr]=[7] @RT(#SlaveF1Chat,#SlaveF2Chat,#SlaveF3Chat,#SlaveM1Chat,#SlaveM2Chat,#SlaveM3ChatPC) Thong Miss
Correct! #DT @ChangeVar[Wrong]=[Wrong]+[1] @Goto(Another)
(Another)
@RT(Lets try again,One more,Once more,Again,Lets try that again,And again,Another one,One round more) #DT @Goto(Route1)
(End)
@Variable[Wrong]>=[Right]I'm not impressed by your score today #SubName #DT @ChangeVar[AcademyBad]=[AcademyBad]+[#Random(1,2)]
@Variable[Right]>[Wrong]You did well #SubName ! #DT @ChangeVar[AcademyGood]=[AcademyGood]+[2]
@RT(#F1,#F2,#F3) & @RT(#M1,#M2,#M3) There is no point in laughing at #SubName #DT
It's not like your performance were any better! #DT
@End